home *** CD-ROM | disk | FTP | other *** search
/ Amiga Game-Power / Amiga Game-Power.iso / power games ii / galactic worm / corewars / beispiele / chang < prev    next >
Text File  |  1994-05-20  |  249b  |  16 lines
  1. ;
  2. ; Chang
  3. ; -----
  4. ;
  5. trap      MOV #0, $7999
  6. maketrap  JMP $trap    
  7. ptr       DAT 9
  8. start     SPL $maketrap
  9.           SPL $lnge 
  10.           SUB #16, ptr 
  11.           MOV #0, @ptr 
  12.           JMP start
  13. lnge      SPL 2
  14.           JMP -1
  15.           MOV 0, 1
  16.